Languguage OS 2/Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO/language/parallax/mac_sit.hqx/Parallaxis 2.11/sort.xrf

Text File | 1992-01-09 | 3KB | 341 lines

423310825

Q sort.p
W
161 911 257 107 1
NOT 4
RIGHT 7
DRAWCARD 8
SCALAR 9
DIV 10
IN_CONNECTED 12
EOL 269
SEND 14
CHR 15
GREEN 272
EXCL 18
LOOP 19
CHAR 276
LAST 533
ELSE 31
SIRANDOM 33
CAP 35
UNTIL 36
STRCMP 37
WRITEREAL 39
POINTER 40
OF 43
READCARD 44
REPEAT 46
VBRANDOM 48
WRITE 49
TRUNC 50
DIM1 307
LOAD 51
WRITEBOOL 308
OR 55
ARCTAN2 57
SUM 59
SIN 61
DRAWFIXPT 62
ARCCOS 63
SIZE 64
A 66
SORT 69
PROCEDURE 70
REDUCE 72
SCRANDOM 329
TO 73
DRAW 330
WRITELN 587
VECTOR 74
I 331
K 76
DEC 77
SELECTWINDOW 334
L 591
CONST 78
N 79
FLOAT 82
LINE 83
R 340
BOOLEAN 87
HALT 88
FIRST 89
OUT_LINECONNECTED 92
MOVETO 349
FALSE 93
SQRT 94
OPENWINDOW 95
TERMCH 352
OPENINPUT 98
SRRANDOM 103
INCL 360
AND 104
MOD 361
ARRAY 108
ELSIF 111
WRITECARD 113
TAN 117
LIST 119
ABS 120
FROM 124
NIL 125
CLOSEINPUT 382
SETPIXEL 126
ARCSIN 130
VIRANDOM 131
RECORD 135
OPENOUTPUT 137
COLOR 394
VAL 140
DRAWINT 145
SWAP 402
TYPE 146
VAR 403
RECEIVE 148
WITH 149
SET 153
PI 410
END 154
EXIT 411
WRITESTRING 155
CLOSEWINDOW 157
FOR 159
DO 160
SYSTEM 417
STORE 161
ENDPARALLEL 165
OUT_CONNECTED 167
TRACE 424
MAX 168
NOTRACE 425
VCRANDOM 170
DISPOSE 427
WRITEINT 684
SETCOLOR 171
IF 172
CASE 174
THEN 179
IN 180
ARCTAN 186
DRAWREAL 191
READSTRING 192
ORD 193
PROPAGATE 195
PARALLEL 196
CLOSEOUTPUT 199
VRRANDOM 201
INC 203
DRAWBOOL 460
SBRANDOM 207
EXP 208
TRUE 465
EVEN 209
WHILE 210
DEBUG 467
BY 213
RETURN 470
CONNECTION 215
CARDINAL 472
BLUE 216
LEFT 220
NEW 222
IN_LINECONNECTED 224
BEGIN 225
READINT 227
READREAL 484
PRODUCT 230
STREQ 233
CONFIGURATION 236
BITSET 493
ODD 237
ID_NO 239
READBOOL 496
READ 241
MIN 243
LN 244
WRITEFIXPT 246
GETPIXEL 248
WINDOWSIZE 505
REAL 249
COS 251
DONE 252
RED 253
INTEGER 256
DRAWSTRING 513

S 111
8 7 3 2
6 307 14 1
6 591 14 4
6 340 14 3
6 140 14 2
6 402 13 1
8 220 3 1
5 66 2 2
1 69
5 76 14 1
2 79 14 10
4 119 5 1
12 8
2 269 12 10
11 12
11 15
12 18
11 533
3 276 12
11 33
11 35
11 37
12 39
12 44
11 48
12 49
11 50
12 308
11 57
11 59
11 61
12 62
11 63
11 64
11 329
12 587
12 330
12 334
12 77
11 82
12 83
3 87 13
12 88
11 89
12 349
11 92
2 93 13 0
11 94
13 352
11 95
12 98
12 360
11 103
12 113
11 117
11 120
12 382
2 125 7 1
12 126
11 130
11 131
3 394 6
12 137
11 140
12 145
2 410 10 2
12 155
12 157
12 424
11 167
12 425
11 168
12 684
12 427
11 170
12 171
11 186
12 191
12 192
11 193
12 199
11 201
12 460
12 203
11 207
2 465 13 1
11 208
11 209
12 467
3 472 11
12 222
11 224
12 484
12 227
11 230
11 233
3 493 9
11 237
12 496
13 239
12 241
11 243
11 244
12 246
12 505
11 248
3 249 10
11 251
13 252
12 513
3 256 14

G 4
1 7 4 0 119 1 105 105 106
1 7 4 0 119 1 34 34 102
1 7 4 0 119 1 29 29 30
8 5 0 0 69 0 1 1 118

Z 26
43 115 116
43 109 115
43 108 118
43 106 118
42 104 106
38 100 101
38 85 102
37 84 85
33 82 83
32 81 82
31 63 84
28 60 61
27 59 60
26 42 62
25 39 84
23 38 39
22 36 38
21 34 36
20 33 102
19 32 104
19 30 104
17 28 30
16 20 26
16 19 28
16 17 28
15 16 17

T 14
11 0 14 1 10
6 0 1 14
13 0 119
11 0 14 1 10
6 0 4 0
7 394 1
10 125 0
11 0 14 0 31
9 493 8 0 31
4 249
11 472 14 0 32767
2 276
1 87
3 256

M 3
253 11 0
272 11 0
216 11 1

C 2
1 "NIL"
1 "3.14159"

E